(add-log-current-defun): Skip doc string

correctly even if it ends with line that starts space.

diff --git a/lisp/add-log.el b/lisp/add-log.el
index fdc546c9a912df5ac29c4ead736f1f3f0b15e2ed..3c570fa17d5a0b4d71fc899c338e3c4a69d1d0ff 100644 (file)
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -358,7 +358,9 @@ Has a preference of looking backwards."
                         ;; or the DEFUN macro used by the C library.
                         (if (condition-case nil
                                 (and (save-excursion
-                                       (forward-line 1)
+                                       (end-of-line)
+                                       (while (= (preceding-char) ?\\)
+                                         (end-of-line 2))
                                        (backward-sexp 1)
                                        (beginning-of-line)
                                        (setq tem (point))